|
| !pdf Run file
|

IconSprites <Obey$Dir>.!Sprites
if "<File$Type_ADF>" = "" then Set File$Type_ADF "Pdf"
Set Alias$@RunType_ADF Run <Obey$Dir>.!Run %%*0
set Pdf$Dir <Obey$Dir>

SetMacro Pdf$Path Choices:Pdf.,<Pdf$Dir>.

SetMacro Pdf$ChoicesFile Pdf:Choices
if "<Choices$Dir>" <> "" then Set Pdf$OldChoicesFile <Choices$Dir>.Pdf

if "<Choices$Write>" <> "" then Set Pdf$ChoicesSave <Choices$Write>.Pdf.Choices else Set Pdf$ChoicesSave <Pdf$Dir>.Choices
|
SetMacro Pdf$FontNamesFile Pdf:FontNames
if "<Choices$Write>" <> "" then Set Pdf$FontNamesSave <Choices$Write>.Pdf.FontNames else Set Pdf$FontNamesSave <Pdf$Dir>.FontNames

RMENSURE Window  0.00  RMLOAD System:modules.toolbox.window
RMENSURE Window  1.17  ERROR You need window 1.17 or later to run !pdf
RMENSURE Menu  0.00  RMLOAD System:modules.toolbox.menu
RMENSURE Menu  0.13  ERROR You need menu 0.13 or later to run !pdf
RMENSURE ProgInfo  0.00  RMLOAD System:modules.toolbox.proginfo
RMENSURE Proginfo  0.00  ERROR You need proginfo to run !pdf
RMENSURE PrintDBox  0.00  RMLOAD System:modules.toolbox.PrintDBox
RMENSURE PrintDBox  0.00  ERROR You need PrintDBox to run !pdf
RMENSURE DrawFile  0.00  RMLOAD System:modules.DrawFile
RMENSURE DrawFile  0.00  ERROR You need DrawFile to run !pdf
RMENSURE FileInfo  0.00  RMLOAD System:modules.toolbox.FileInfo
RMENSURE FileInfo  0.00  ERROR You need FileInfo to run !pdf
RMENSURE IconBar  0.00  RMLOAD System:modules.toolbox.IconBar
RMENSURE IconBar  0.00  ERROR You need IconBar to run !pdf
RMENSURE Scale  0.00  RMLOAD System:modules.toolbox.Scale
RMENSURE Scale  0.00  ERROR You need Scale to run !pdf
RMENSURE SaveAs  0.00  RMLOAD System:modules.toolbox.SaveAs
RMENSURE SaveAs  0.00  ERROR You need SaveAs to run !pdf
RMENSURE FontMenu  0.00  RMLOAD System:modules.toolbox.FontMenu
RMENSURE FontMenu  0.00  ERROR You need FontMenu to run !pdf

|wimpslot -min 500k -max 16000k
wimpslot -min 500k -max 12000k

| commandline options
| -cmd		Print PDF commands to stderr
| -debug	Debuging mode
|		0x04 function trace
|		0x08 mouse click
|		0x10 print
| -nobaricon	Do not show bar icon
| <filename>	PDF filename
|
| redirection: You can redirect stderr to a file
| eg: run <pdf$dir>.!runimage %*0 >& <pdf$dir>.errors

|run <pdf$dir>.!runimage %*0 >& <pdf$dir>.errors
run <Pdf$Dir>.!runimage %*0
